﻿Imports Microsoft.VisualBasic

Public Class SubMenu

    Private _url As String
    Private _name As String

    Public Sub New(ByVal name As String, ByVal url As String)
        _name = name
        _url = url
    End Sub

    Public ReadOnly Property Name() As String
        Get
            Return _name
        End Get
    End Property

    Public ReadOnly Property URL() As String
        Get
            Return _url
        End Get
    End Property

End Class
